home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Game-Power
/
Amiga Game-Power.iso
/
pd mix ii
/
access
/
thai
/
main.c
< prev
next >
Wrap
C/C++ Source or Header
|
1994-05-20
|
2KB
|
103 lines
#include "quiz.h"
APTR IntuitionBase;
APTR GfxBase;
extern APTR OpenLibrary ();
extern struct IntuiMessage *GetMsg ();
extern struct Window *OpenWindow ();
static struct NewWindow nw = {
0 , 0 , 640 , 200 , -1 , -1 ,
GADGETUP | CLOSEWINDOW ,
WINDOWDEPTH | WINDOWCLOSE | WINDOWDRAG | SMART_REFRESH | NOCAREREFRESH
| ACTIVATE ,
NULL , NULL , (UBYTE *) "Thai Quizer V1.0" , NULL , NULL ,
640 , 200 , 640 , 200 , WBENCHSCREEN
};
main ()
{
GfxBase = OpenLibrary ( "graphics.library" , 0L );
if ( GfxBase == NULL ) {
exit ( 1 );
}
IntuitionBase = OpenLibrary ( "intuition.library" , 0L );
if ( IntuitionBase == NULL ) {
CloseLibrary ( GfxBase );
exit ( 1 );
}
window = OpenWindow ( &nw );
if ( window == NULL ) {
CloseLibrary ( GfxBase );
CloseLibrary ( IntuitionBase );
exit ( 1 );
}
if ( ! open_thai_font () ) {
CloseLibrary ( GfxBase );
CloseLibrary ( IntuitionBase );
CloseWindow ( window );
exit ( 1 );
}
if ( ! init_speech () ) {
close_thai_font ();
CloseLibrary ( GfxBase );
CloseLibrary ( IntuitionBase );
CloseWindow ( window );
exit ( 1 );
}
init_thai_keyboard ();
init_globals ();
if ( load_phrases () ) {
do_commands ();
}
else
puts ( "Failed to load phrases" );
unload_phrases ();
close_speech ();
close_thai_font ();
CloseWindow ( window );
CloseLibrary ( GfxBase );
CloseLibrary ( IntuitionBase );
}
do_commands ()
{
struct IntuiMessage *msg;
int quit;
struct Gadget *gadget;
quit = FALSE;
while ( ! quit ) {
WaitPort ( window->UserPort );
while ( msg = GetMsg ( window->UserPort ) ) {
switch ( msg->Class ) {
case CLOSEWINDOW :
quit = TRUE;
ReplyMsg ( msg );
break;
case GADGETUP :
gadget = (struct Gadget *) msg->IAddress;
ReplyMsg ( msg );
do_gadget ( gadget );
break;
default :
ReplyMsg ( msg );
break;
}
}
}
}